home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / apps / database / ingres04.lzh / source / gutil / bitcnt.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-01-23  |  320 b   |  23 lines
  1. # include    <sccs.h>
  2.  
  3. SCCSID(@(#)bitcnt.c    8.1    12/31/84)
  4.  
  5.  
  6. /*
  7. **    Count the number of 1's in the integer var. As long
  8. **    as left shift is zero fill this routine is machine
  9. **    independent.
  10. */
  11.  
  12. bitcnt(var)
  13. register int    var;
  14. {
  15.     register int    i, ret;
  16.  
  17.     for (ret = 0, i = 1; i; i <<= 1)
  18.         if (i & var)
  19.             ret++;
  20.  
  21.     return (ret);
  22. }
  23.